Profile of (eval 415)[Sub/Quote.pm:3]

Filename	(eval 415)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 32 statements in 367µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
2	2	2	63µs	108s	OpenAPI::Modern::::newOpenAPI::Modern::new
1	1	1	10µs	31µs	OpenAPI::Modern::::BEGIN@7OpenAPI::Modern::BEGIN@7
1	1	1	6µs	6µs	OpenAPI::Modern::::BEGIN@12.299OpenAPI::Modern::BEGIN@12.299
1	1	1	6µs	13µs	OpenAPI::Modern::::BEGIN@43OpenAPI::Modern::BEGIN@43
1	1	1	5µs	12µs	OpenAPI::Modern::::BEGIN@48OpenAPI::Modern::BEGIN@48

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	1µs			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
3	1	0s			my $isa_check_for_openapi_5fdocument = ${$_[1]->{"\$isa_check_for_openapi_5fdocument"}};
4	1	1µs			my $isa_check_for_evaluator = ${$_[1]->{"\$isa_check_for_evaluator"}};
5	1	0s			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
6					package OpenAPI::Modern;
7	2	41µs	2	52µs	# spent 31µs (10+21) within OpenAPI::Modern::BEGIN@7 which was called: # once (10µs+21µs) by Sub::Quote::_clean_eval at line 7 no warnings 'closure'; # spent 31µs making 1 call to OpenAPI::Modern::BEGIN@7 # spent 21µs making 1 call to warnings::unimport
8					# spent 108s (63µs+108) within OpenAPI::Modern::new which was called 2 times, avg 54.1s/call: # once (55µs+108s) by main::RUNTIME at line 177 of Sub/Defer.pm # once (8µs+1.31ms) by main::RUNTIME at line 6 of /Users/ether/git/fastly/Heavenly/profiling/jsm-0.556-om-0.034/../prof.pl sub new {
9					($_QUOTED,$_UNQUOTED) if 0;
10					# BEGIN quote_sub PRELUDE
11					package OpenAPI::Modern;
12					# spent 6µs within OpenAPI::Modern::BEGIN@12.299 which was called: # once (6µs+0s) by Sub::Quote::_clean_eval at line 17 BEGIN {
13	1	1µs			$^H = 2018;
14	1	1µs			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
15	1	4µs			%^H = (
16					);
17	1	117µs	1	6µs	} # spent 6µs making 1 call to OpenAPI::Modern::BEGIN@12.299
18					# END quote_sub PRELUDE
19	1	0s			my $invoker = CORE::shift();
20	1	0s			my $class = CORE::ref($invoker) ? CORE::ref($invoker) : $invoker;
21	1	1µs			if ($class ne "OpenAPI::Modern") {
22					if ($Moo::MAKERS{$class}) {
23					if ($Moo::MAKERS{$class}{constructor}) {
24					package OpenAPI::Modern;
25					return $invoker->SUPER::new(@_);
26					}
27					Moo->_constructor_maker_for($class);
28					return $invoker->new(@_);
29					} elsif ($INC{"Moose.pm"} and my $meta = Class::MOP::get_metaclass_by_name($class)) {
30					return $meta->new_object(
31					$class->can("BUILDARGS") ? $class->BUILDARGS(@_)
32					: $class->Moo::Object::BUILDARGS(@_)
33					);
34					}
35					}
36	1	9µs	1	108s	my $args = $class->BUILDARGS(@_); # spent 108s making 1 call to OpenAPI::Modern::BUILDARGS
37	1	7µs			Carp::croak("BUILDARGS did not return a hashref") unless CORE::ref($args) eq 'HASH';
38	1	2µs			if (my @missing = grep !exists $args->{$_}, "evaluator", "openapi_document") {
39					Carp::croak("Missing required arguments: ".CORE::join(', ', sort @missing));
40					}
41	1	6µs			my $new = bless({}, $class);;
42	1	0s			(exists $args->{"evaluator"} and ($new->{"evaluator"} = scalar do { my $value = $args->{"evaluator"};
43	5	74µs	4	21µs	# spent 13µs (6+7) within OpenAPI::Modern::BEGIN@43 which was called: # once (6µs+7µs) by Sub::Quote::_clean_eval at line 43 (do { no warnings "void"; package Type::Tiny; ((Scalar::Util::blessed($value) and $value->isa(q[JSON::Schema::Modern]))) or Type::Tiny::_failed_check($isa_check_for_evaluator, "InstanceOf[\"JSON::Schema::Modern\"]", $value, "attribute_name","evaluator","attribute_step","isa check","mgaca","0","varname","\$args->{\"evaluator\"}"); $value }), # spent 13µs making 1 call to OpenAPI::Modern::BEGIN@43 # spent 7µs making 1 call to warnings::unimport # spent 1µs making 1 call to UNIVERSAL::isa # spent 0s making 1 call to Scalar::Util::blessed
44					$value
45					}
46					)),
47	2	20µs			(exists $args->{"openapi_document"} and ($new->{"openapi_document"} = scalar do { my $value = $args->{"openapi_document"};
48	5	77µs	4	19µs	# spent 12µs (5+7) within OpenAPI::Modern::BEGIN@48 which was called: # once (5µs+7µs) by Sub::Quote::_clean_eval at line 48 (do { no warnings "void"; package Type::Tiny; ((Scalar::Util::blessed($value) and $value->isa(q[JSON::Schema::Modern::Document::OpenAPI]))) or Type::Tiny::_failed_check($isa_check_for_openapi_5fdocument, "InstanceOf[\"JSON::Schema::Modern::Document::OpenAPI\"]", $value, "attribute_name","openapi_document","attribute_step","isa check","mgaca","0","varname","\$args->{\"openapi_document\"}"); $value }), # spent 12µs making 1 call to OpenAPI::Modern::BEGIN@48 # spent 7µs making 1 call to warnings::unimport # spent 0s making 1 call to Scalar::Util::blessed # spent 0s making 1 call to UNIVERSAL::isa
49					$value
50					}
51					)),
52					return $new;
53					}
54	1	1µs			$$_UNQUOTED = \&new;
55					}
56	1	4µs			1;
57
58					;